home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 24 / CU Amiga Magazine's Super CD-ROM 24 (1998)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1998-07].iso / CUCD / Utilities / vim-5.1 / syntax / lex.vim < prev    next >
Encoding:
Text File  |  1998-03-29  |  4.0 KB  |  75 lines
  1. " Vim syntax file
  2. " Language:      Lex
  3. " Maintainer:    Dr. Charles E. Campbell, Jr. <cec@gryphon.gsfc.nasa.gov>
  4. " Last change:    March 29, 1998
  5.  
  6. " Remove any old syntax stuff hanging around
  7. syn clear
  8.  
  9. " Read the C syntax to start with
  10. so <sfile>:p:h/c.vim
  11.  
  12. " --- Lex stuff ---
  13.  
  14. "I'd prefer to use lex.* , but it doesn't handle forward definitions yet
  15. let b:lexlist="lexAbbrvBlock,lexAbbrv,lexAbbrv,lexAbbrvRegExp,lexInclude,lexPatBlock,lexPat,lexBrace,lexPatString,lexPatTag,lexPatTag,lexPatComment,lexPatCodeLine,lexMorePat,lexPatSep,lexSlashQuote,lexPatCode,cInParen"
  16. let b:lexlistpc="lexAbbrvBlock,lexAbbrv,lexAbbrv,lexAbbrvRegExp,lexInclude,lexPatBlock,lexPat,lexBrace,lexPatTag,lexPatTag,lexPatComment,lexPatCodeLine,lexMorePat,lexPatSep,lexSlashQuote,cInParen"
  17.  
  18. " Abbreviations Section
  19. syn region lexAbbrvBlock    start="^\([a-zA-Z_]\+\t\|%{\)" end="^%%$"me=e-2    skipnl    nextgroup=lexPatBlock contains=lexAbbrv,lexInclude
  20. syn match  lexAbbrv        "^\I\i*\s"me=e-1            skipwhite    contained nextgroup=lexAbbrvRegExp
  21. syn match  lexAbbrv        "^%[sx]"                    contained
  22. syn match  lexAbbrvRegExp    "\s\S.*$"lc=1                contained nextgroup=lexAbbrv,lexInclude
  23. exe 'syn region lexInclude    matchgroup=lexSep    start="^%{" end="%}"    contained    contains=ALLBUT,' . b:lexlist
  24.  
  25. "%% : Patterns {Actions}
  26. syn region lexPatBlock    matchgroup=Todo    start="^%%$" matchgroup=Todo end="^%%$"    skipnl skipwhite contains=lexPat,lexPatTag,lexPatComment
  27. syn region lexPat        start=+\S+ skip="\(\\\\\)*\\." end="\s"me=e-1 contained nextgroup=lexMorePat,lexPatSep contains=lexPatString,lexSlashQuote,lexBrace
  28. syn region lexBrace    start="\[" skip=+\(\\\\\)*\\+ end="]"            contained
  29. syn region lexPatString    matchgroup=String start=+"+ skip=+\(\\\\\)*\\"+ matchgroup=String end=+"+    contained
  30. syn match  lexPatTag    "^<\I\i*\(,\I\i*\)*>*"            contained nextgroup=lexPat,lexPatTag,lexMorePat,lexPatSep
  31. syn match  lexPatTag    +^<\I\i*\(,\I\i*\)*>*\(\\\\\)*\\"+        contained nextgroup=lexPat,lexPatTag,lexMorePat,lexPatSep
  32. syn region lexPatComment    start="^\s*/\*" end="\*/"        skipnl    contained contains=cTodo nextgroup=lexPatComment,lexPat,lexPatString,lexPatTag
  33. exe 'syn match  lexPatCodeLine    ".*$"                oneline    contained contains=ALLBUT,' . b:lexlist
  34. syn match  lexMorePat    "\s*|\s*$"            skipnl    contained nextgroup=lexPat,lexPatString,lexPatTag,lexPatComment
  35. syn match  lexPatSep    "\s\+"                    contained nextgroup=lexMorePat,lexPatCode,lexPatCodeLine
  36. syn match  lexSlashQuote    +\(\\\\\)*\\"+                contained
  37. exe 'syn region lexPatCode matchgroup=Delimiter start="{" matchgroup=Delimiter end="}"     skipnl contained contains=ALLBUT,' . b:lexlistpc
  38.  
  39. syn keyword ClexFunctions    BEGIN    input    unput    woutput    yyleng    yylook    yytext
  40. syn keyword ClexFunctions    ECHO    output    winput    wunput    yyless    yymore    yywrap
  41.  
  42. " <c.vim> includes several ALLBUTs; these have to be treated so as to exclude lex* groups
  43. syn clear cParen cDefine cPreProc cMulti
  44. syn region cParen    start='(' end=')'            transparent    contains=ALLBUT,cParenError,cIncluded,cSpecial,cTodo,cUserCont,cUserLabel,lex.*
  45. syn region cDefine    start="^\s*#\s*\(define\>\|undef\>\)" skip="\\$" end="$"    contains=ALLBUT,cPreCondit,cIncluded,cInclude,cDefine,cInParen,lex.*
  46. syn region cPreProc    start="^\s*#\s*\(pragma\>\|line\>\|warning\>\|warn\>\|error\>\)" skip="\\$" end="$" contains=ALLBUT,cPreCondit,cIncluded,cInclude,cDefine,cInParen,lex.*
  47. syn region cMulti    start='?' end=':'            transparent     contains=ALLBUT,cIncluded,cSpecial,cTodo,cUserCont,cUserLabel,lex.*
  48.  
  49. " Synchronization
  50. syn sync clear
  51. syn sync minlines=300
  52. syn sync match lexSyncPat    grouphere  lexPatBlock    "^%[a-zA-Z]"
  53. syn sync match lexSyncPat    groupthere lexPatBlock    "^<$"
  54. syn sync match lexSyncPat    groupthere lexPatBlock    "^%%$"
  55.  
  56. if !exists("did_lex_syntax_inits")
  57.   let did_lex_synax_inits = 1
  58.   hi link    lexSlashQuote    lexPat
  59.   hi link    lexBrace        lexPat
  60.  
  61.   hi link    ClexFunctions    Function
  62.   hi link    lexAbbrv        SpecialChar
  63.   hi link    lexAbbrvRegExp    Macro
  64.   hi link    lexMorePat    SpecialChar
  65.   hi link    lexPat        Function
  66.   hi link    lexPatComment    Comment
  67.   hi link    lexPatString    Function
  68.   hi link    lexPatTag        Special
  69.   hi link    lexSep        Delimiter
  70. endif
  71.  
  72. let b:current_syntax = "lex"
  73.  
  74. " vim:ts=10
  75.